home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / PICTURE / PICTURI2.DIR / 00078.ls < prev    next >
Encoding:
Text File  |  1996-09-05  |  1.4 KB  |  51 lines
  1. on mouseDown
  2.   repeat while the stillDown = 1
  3.     set the locH of sprite 20 to the mouseH
  4.     set the locV of sprite 20 to the mouseV
  5.     if rollOver(10) then
  6.       set the castNum of sprite 10 to the number of member "6last01"
  7.     else
  8.       set the castNum of sprite 10 to the number of member "capturebackbox"
  9.     end if
  10.     updateStage()
  11.   end repeat
  12. end
  13.  
  14. on mouseUp
  15.   if rollOver(10) and (the castNum of sprite 2 <> the number of member "printbeg") then
  16.     puppetSprite(4, 0)
  17.     puppetSprite(5, 0)
  18.     puppetSprite(6, 0)
  19.     puppetSprite(7, 0)
  20.     puppetSprite(8, 0)
  21.     puppetSprite(9, 0)
  22.     puppetSprite(10, 0)
  23.     puppetSprite(11, 0)
  24.     puppetSprite(12, 0)
  25.     puppetSprite(20, 0)
  26.     set the castNum of sprite 10 to the number of member "capturebackbox"
  27.     updateStage()
  28.     puppetSound("sfx08")
  29.     updateStage()
  30.     go(the frame - 1)
  31.   else
  32.     if rollOver(10) and (the castNum of sprite 2 = the number of member "printbeg") then
  33.       puppetSprite(4, 0)
  34.       puppetSprite(5, 0)
  35.       puppetSprite(6, 0)
  36.       puppetSprite(7, 0)
  37.       puppetSprite(8, 0)
  38.       puppetSprite(9, 0)
  39.       puppetSprite(10, 0)
  40.       puppetSprite(11, 0)
  41.       puppetSprite(12, 0)
  42.       puppetSprite(20, 0)
  43.       puppetSound("sfx02")
  44.       updateStage()
  45.       go("printend")
  46.       set the castNum of sprite 10 to the number of member "capturebackbox"
  47.       updateStage()
  48.     end if
  49.   end if
  50. end
  51.